home *** CD-ROM | disk | FTP | other *** search
- //. VM/JCL - November 28, 1983 - Jim Kyle
- //. do vm (c,a,m2...m10) c=compile all, a=assemble, m=mod nbr
- //if w
- //assign w=we
- //else
- //assign w=nl
- //end
- //if c
- . compiling ERED modules into VMED/CMD
- //end
- //if c+m2
- c(lc) ed2 -c
- //end
- //if c+o+m2
- optlc3 <ed2/asm >ed2/asm
- //end
- //if c+m3
- c(lc) ed3 -c
- //end
- //if c+o+m3
- optlc3 <ed3/asm >ed3/asm
- //end
- //if c+m4
- c(lc) ed4 -c
- //end
- //if c+o+m4
- optlc3 <ed4/asm >ed4/asm
- //end
- //if c+m5
- c(lc) ed5 -c
- //end
- //if c+o+m5
- optlc3 <ed5/asm >ed5/asm
- //end
- //if c+m6
- c(lc) ed6 -c
- //end
- //if c+o+m6
- optlc3 <ed6/asm >ed6/asm
- //end
- //if c+m7
- c(lc) ed7 -c
- //end
- //if c+o+m7
- optlc3 <ed7/asm >ed7/asm
- //end
- //if c+m8
- c(lc) ed8 -c
- //end
- //if c+o+m8
- optlc3 <ed8/asm >ed8/asm
- //end
- //if c+m9
- c(lc) ed9 -c
- //end
- //if c+o+m9
- optlc3 <ed9/asm >ed9/asm
- //end
- //if c+m10
- c(lc) vmed10 -c +o=ed10
- //end
- //if c+o+m10
- optlc3 <ed10/asm >ed10/asm
- //end
- //if a
- . assembling modules to CMD file
- c(e) (jcl,abort)
- lered
- avmed:1-ne-nm-nc-#w#
- b
- //end
- . VMED compilation and assembly complete.
- //exit
-